--[[
    编码: WMS-19-05
    名称: 容器货品明细-删除后
    作者：HAN  
    日期：2025-1-29

    级别：固定 (说明本段代码在项目中不太会变化)
    
    函数： BeforeDataObjDelete

    功能:
        -- 判断一下当前要删除的 CG_Detail 相关的 上架单【】的状态是否已经是 完成状态
           如果是完成状态就不能解绑，
    更改记录:

--]]

wms_base = require( "wms_base" )

function BeforeDataObjDelete ( strLuaDEID ) 
    local   nRet, strRetInfo

    -- step1: 获取当前【容器货品明细】对象
    local cg_detail
    nRet, cg_detail = m3.GetSysCurEditDataObj( strLuaDEID, "CG_Detail" )
    if ( nRet ~= 0 )  then lua.Error( strLuaDEID, debug.getinfo(1), "获取当前编辑属性失败! "..cg_detail ) end 
  
    local str_bs_no = cg_detail.bs_no 

    -- 如果有上架单需要判断上架单的状态是否已经是 完成状态
    if ( str_bs_no ~= "") then
        local strCondition
        if ( cg_detail.bs_type == "Inbound_Order") then
            strCondition = "S_NO = '"..str_bs_no.."'"
            nRet, id, strRetInfo = mobox.getDataObjAttrByKeyAttr( strLuaDEID, "Inbound_Order", strCondition, "N_B_STATE" )
            if ( nRet ~= 0 )  then 
                -- 存在上架单已经被删除的情况，因此只是警告一下
                lua.Warning( strLuaDEID, debug.getinfo(1), "获取【入库单】属性失败! "..id ) 
                return
            end 
            if ( strRetInfo == '' ) then return end
            local attrs = json.decode( strRetInfo ) 
            local state = lua.StrToNumber( attrs[1].value )  

            -- 2 组盘完成 3 -- 入库完成
            if ( state >= 2 ) then 
                -- 前端显示信息
                mobox.stopProgram( strLuaDEID, "入库单'"..str_bs_no.."'已经组盘完成或已经入库，不能进行对象删除操作!")
                return 
            end      
        end  
    end
end